(ad-compile-function): Fix last change.

diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index c8a7ca6a875b63ede9719c71aa476798ea9fcc5b..17f2ed53ba5465b1bf4f8966bbab90725b7ec09e 100644 (file)
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -2687,7 +2687,7 @@ For that it has to be fbound with a non-autoload definition."
        (let ((symbol (make-symbol "advice-compilation"))
             (byte-compile-warnings byte-compile-warnings)
              ;; Don't pop up windows showing byte-compiler warnings.
-             (warning-suppress-types '(bytecomp)))
+             (warning-suppress-types '((bytecomp))))
         (if (featurep 'cl)
             (byte-compile-disable-warning 'cl-functions))
         (fset symbol (symbol-function function))